home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 004a / grammar2.zip / INSTALL2.BAT < prev    next >
DOS Batch File  |  1990-05-08  |  5KB  |  154 lines

  1. echo off
  2. REM  INSTALL2.BAT FOR CG 2.1 (May 1990)
  3. REM  Unpack files to requested location; get word processor
  4. %1LOCATE 00,00
  5. copy CLS.BAT con >nul
  6. %1LOCATE 03,00
  7. echo  ║     Copying Correct Grammar files.  This may take several
  8. echo  ║     minutes.  Please stand by . . .
  9. copy %1PKXARC.COM >nul
  10. PKXARC -r %1CG1 GETNUM.EXE >nul
  11. copy %1GETYNCG.COM >nul
  12. copy %1LOCATE.COM >nul
  13. if not exist LOCATE.COM goto NOROOM
  14. copy %1CG.EXE >nul  
  15. if not exist CG.EXE goto NOROOM
  16. LOCATE 07,00
  17. echo  ║     Still working.  Thank you for your patience.
  18. rem PKXARC -r %1CG1 README.CG >nul
  19. PKXARC -r %1CG1 READMECG.TXT >nul
  20. PKXARC -r %1CG1 DEMOCG.BAT >nul
  21. PKXARC -r %1CG1 DEMO.CG >nul
  22. PKXARC -r %1CG1 INSTALL3.BAT >nul        
  23. PKXARC -r %1CG1 LEARNCG.BAT >nul
  24. PKXARC -r %1CG1 LEARNING.CG >nul
  25. if not exist LEARNING.CG goto NOROOM
  26. if exist %13 goto XCONT3
  27. LOCATE 00,00
  28. copy CLS.BAT con >nul
  29. LOCATE 02,00
  30. goto TWO
  31. :BAD2
  32. if exist %1CG2.ARC goto CONT2
  33. LOCATE 02,00
  34. echo  ║     SORRY, WRONG DISK!
  35. :TWO
  36. LOCATE 04,00
  37. echo  ║     Insert your Correct Grammar DISK 2 in your diskette drive.  
  38. echo  ║     
  39. echo  ║     Press any key to continue.
  40. pause >nul
  41. if not exist %1CG2.ARC goto BAD2
  42. :CONT2
  43. LOCATE 00,00
  44. copy CLS.BAT con >nul
  45. LOCATE 03,00
  46. echo  ║     Copying Correct Grammar files.  This may take several
  47. echo  ║     minutes.  Please stand by . . .
  48. :CONT3
  49. LOCATE 07,00
  50. :XCONT3
  51. if exist CGRAMMAR.OV6 del CGRAMMAR.OV? >nul
  52. PKXARC -r %1CG2 CGRAMMAR.OV0 >nul  
  53. if not exist CGRAMMAR.OV0 goto NOROOM
  54. echo  ║     Still working.  Thank you for your patience.
  55. PKXARC -r %1CG2 CGRAMMAR.EXE  >nul  
  56. if not exist CGRAMMAR.EXE goto NOROOM
  57. LOCATE 00,00
  58. copy CLS.BAT con >nul
  59. LOCATE 02,00
  60. goto THREE
  61. :BAD3
  62. if exist %1CG3.ARC goto CONT3
  63. LOCATE 02,00
  64. echo  ║     SORRY, WRONG DISK!
  65. :THREE
  66. LOCATE 04,00
  67. if not exist %13 echo  ║     Insert your Correct Grammar DISK 3 in your diskette drive.  
  68. if exist %13 echo  ║     Insert your Correct Grammar DISK 2 in your diskette drive.  
  69. echo  ║     
  70. echo  ║     Press any key to continue.
  71. pause >nul
  72. if not exist %1CG3.ARC goto BAD3
  73. :CONT3
  74. LOCATE 00,00
  75. copy CLS.BAT con >nul
  76. LOCATE 03,00
  77. echo  ║     Copying Correct Grammar files.  This may take several
  78. echo  ║     minutes.  Please stand by . . .
  79. LOCATE 07,00
  80. PKXARC -r %1CG3 CGRAMMAR.OV?  >nul  
  81. PKXARC -r %1CG3 WHATSNEW.*  >nul  
  82. if not exist CGRAMMAR.OV5 goto NOROOM
  83. echo  ║     Almost finished.  Please wait . . .
  84. LOCATE 09,00
  85. PKXARC -r %1CG3 CG-PIF.DVP >nul
  86. if not exist CGDIC.SYS PKXARC -r %1CG3 CGDIC.SYS >nul
  87. PKXARC -r %1CG3 CGEMPTY.SUP >nul
  88. if not exist CGEMPTY.SUP goto NOROOM
  89. goto ASKWP
  90. :NOROOM
  91. cls
  92. echo  ╔═══════════════════════════════════════════════════════════════════════╗
  93. echo  ║                                                                       ║
  94. echo  ║     Sorry, you are out of disk space.  Cannot continue.               ║
  95. echo  ║                                                                       ║
  96. echo  ║     To install Correct Grammar, you need 1.2 Mb of available space    ║
  97. echo  ║     on your hard disk.   Please correct the problem and try again.    ║
  98. echo  ║                                                                       ║
  99. echo  ╚═══════════════════════════════════════════════════════════════════════╝
  100. goto QUIT
  101. :SORRY
  102. LOCATE 00,00
  103. copy CLS.BAT con >nul
  104. LOCATE 02,00
  105. echo  ║     Sorry, that is not a valid selection.  
  106. goto ASKWP1
  107. :ASKWP
  108. LOCATE 00,00
  109. copy CLS.BAT con >nul
  110. LOCATE 02,00
  111. echo  ║     Which word processor do you usually use? 
  112. :ASKWP1
  113. echo  ║                                             
  114. echo  ║      1.  WordPerfect 5.1
  115. echo  ║      2.  WordPerfect 5.0
  116. echo  ║      3.  WordPerfect 4  
  117. echo  ║      4.  WordStar Professional 3, 4, 5, 5.5 or 6.0
  118. echo  ║      5.  WordStar 2000 2, 3 or 3.5
  119. echo  ║      6.  Sidekick    
  120. echo  ║      7.  Microsoft Word 5
  121. echo  ║      8.  Microsoft Word 3 or 4
  122. echo  ║      9.  Microsoft Works 1 or 2                                       ║
  123. echo  ║     10.  PC-Write                                                     ║
  124. echo  ║     11.  pfs Write A, B or C                                          ║
  125. echo  ║     12.  Professional Write 1 or 2                                    ║
  126. echo  ║     13.  XyWrite                                                      ║
  127. echo  ║                                                                       ║
  128. echo  ║     14.  ASCII                                                        ║
  129. echo  ║                                                                       ║
  130. echo  ║     Please type your choice and press Enter:                          ║
  131. echo  ║                                                                       ║
  132. echo  ╚═══════════════════════════════════════════════════════════════════════╝
  133. LOCATE 20,48
  134. GETNUM
  135. if errorlevel == 15 goto SORRY
  136. if errorlevel == 14 INSTALL3 %1 0
  137. if errorlevel == 13 INSTALL3 %1 9
  138. if errorlevel == 12 INSTALL3 %1 11
  139. if errorlevel == 11 INSTALL3 %1 11
  140. if errorlevel == 10 INSTALL3 %1 8
  141. if errorlevel == 9 INSTALL3 %1 7 
  142. if errorlevel == 8 INSTALL3 %1 6
  143. if errorlevel == 7 INSTALL3 %1 5 
  144. if errorlevel == 6 INSTALL3 %1 4 
  145. if errorlevel == 5 INSTALL3 %1 10 
  146. if errorlevel == 4 INSTALL3 %1 3 
  147. if errorlevel == 3 INSTALL3 %1 2
  148. if errorlevel == 2 INSTALL3 %1 1 0
  149. if errorlevel == 1 INSTALL3 %1 1 1
  150. goto SORRY
  151. :QUIT
  152.  
  153.  
  154.